home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Present…ry 5: (Reseller Edition) / Apple Reference & Presentations Library 5.0 (Reseller Edition).iso / 5-Fonts & Software / HyperCard 1.2.5 / More Stacks / Clip Art / card_5571.txt < prev    next >
Text File  |  1989-09-06  |  1KB  |  63 lines
  1. -- card: 5571 from stack: in
  2. -- bmap block id: 8706
  3. -- flags: 0000
  4. -- background id: 2707
  5. -- name: 
  6.  
  7.  
  8. -- part 1 (button)
  9. -- low flags: 00
  10. -- high flags: 0000
  11. -- rect: left=201 top=106 right=211 bottom=312
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 0 / 0
  14. -- text alignment: 1
  15. -- font id: 0
  16. -- text size: 12
  17. -- style flags: 0
  18. -- line height: 16
  19. -- part name: 
  20. ----- HyperTalk script -----
  21. on mouseUp
  22.   go to card id 8410
  23. end mouseUp
  24.  
  25.  
  26.  
  27.  
  28. -- part 2 (button)
  29. -- low flags: 00
  30. -- high flags: 8003
  31. -- rect: left=321 top=228 right=250 bottom=411
  32. -- title width / last selected line: 0
  33. -- icon id / first selected line: 0 / 0
  34. -- text alignment: 1
  35. -- font id: 0
  36. -- text size: 12
  37. -- style flags: 0
  38. -- line height: 16
  39. -- part name: Hit the ball
  40. ----- HyperTalk script -----
  41. on mouseUp
  42.   put the userLevel into saveLevel
  43.   if the userLevel < 3 then set userLevel to 3 -- "Painting"
  44.   if the userLevel < 3 then exit mouseUp
  45.   choose select tool
  46.   doMenu "Select All"
  47.   doMenu "Select"
  48.   set dragSpeed to 150
  49.   drag from 250,171 to 445,171
  50.   drag from 445,171 to 350,78
  51.   drag from 350,78 to 48,171
  52.   drag from 48,171 to 75,255
  53.   drag from 75,255 to 250,171
  54.   doMenu "Select All"
  55.   doMenu "Revert"
  56.   choose browse tool
  57.   set userLevel to saveLevel
  58. end mouseUp
  59.  
  60.  
  61. -- part contents for background part 1
  62. ----- text -----
  63. Baseball, ball, sports, round